close;
clear;

load dropjet.000;

id=80;
jd=40;
f=zeros(id,jd);

m=0;
for k=1:1000,
m=m+1;
for i=1:id,
for j=1:jd,
m=m+1;
 f(i,j)=dropjet(m);
end,
end,
contour(f',[0]);
pause;
end;
